(rmail-convert-file): Look back for ^_ only at bol.

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index d631eba3ab59babcad0494beb63aeb16f1007f07..49128f85eb50c66041577354fb755a3c17fc68cf 100644 (file)
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -338,8 +338,8 @@ If `rmail-display-summary' is non-nil, make a summary for this RMAIL file."
     (if (or convert
            (save-excursion
              (goto-char (point-max))
-             (search-backward "\^_")
-             (forward-char 1)
+             (search-backward "\n\^_")
+             (forward-char 2)
              (looking-at "\n*From ")))
        (let ((buffer-read-only nil))
          (message "Converting to Babyl format...")